Seitenzahl-Test 09-17-95 %$VER: Seitenzahl-Test 1.00 (09-17-95) New... Open... Make Copy... Streamline... Preferences... Workbench Help... About... Quit... Paste Clear Select All Select Layer Cut Page Copy Page Colors Load... Save... Restore Colors Default Colors Brush Colors Image Colors Last Color Font Cycle Grid... Stop Sound Show All Unlock All Edit Form Share Next Page Previous Page First Page Last Page Backward Forward Last Book Browse... Autobrowse... Bookshelf New Page Delete Page New Form Load Form... Save Form... Image Load... Save... Capture... Clipboard Paste Spare Swap Frames Copy to Spare Merge in Front Merge in Back Delete Spare Frame Previous Delete Copy to All Color Remap Transparency Paper <-> Pen Paper -> Pen Count Vertical Horizontal Info... Brush Load... Save... Restore Clipboard Paste Color Remap Transparency Paper <-> Pen Paper -> Pen Center Corner Any Point Any Size Halve Double Halve Width Halve Height Double Width Double Height To PAL To NTSC Vertical Horizontal Shear Vertical Horizontal Rotate Any Angle Paint Matte Color Replace Smear Dissolve Spare Cycle Cycle 2 Gradient Gradient 2 Smudge Chaos Count Custom Dither Edges Object Load... Save... Bring to Front Send to Back Bring Closer Send Farther Group Ungroup Duplicate... Align... Info... Actions... Script... Load... Save... Plain Underline Italic Shadow Font... Spacing... Hypertext Actions... Script... Tools Coordinates Title Bar Palette Colors Patterns Paint Tools Paint Types Histogram Magnifier Messages Draw Tools Layers Pages Author Book... Form... Page... Display... Narrator... Hypertext... Resources... Effect... Effect Area DDDUUUfffwww topaz.font FONTS: Seitenzahl-Test wwwwww DDDUUUfffwww @1gehe zu Buch 1 Buch 2 &on SelectUp begin go book "Buch1" Buch1 FONTS: *XAnwendungen:HelmLite-Work/Seitenzahl-Test Buch2 @ggehe zu Buch 1 Buch 2 @TText eingeben @aText anzeigen &on SelectUp begin go book "Buch1" Buch1 xon SelectUp begin ask "Geben Sie einen Text ein, der an Buch 1 bergeben werden soll:" save it as "ENV:Uebergabe" Geben Sie einen Text ein, der an Buch 1 bergeben werden soll: ENV:Uebergabe Xon SelectUp begin load text "ENV:Uebergabe" into UebergabeText answer UebergabeText ENV:Uebergabe